Sqr                      Returns the Square of a Value

 Sqr(Val : Real) : Real;
 Sqr(Val : Integer) : Integer;

    Returns the square of Val--i.e., Val * Val. Note that the type
    returned is the same as the type passed.

             Val    An integer or real value (constant, variable, function
                    call, or expression).

         Limits:    if Val is of type Real and Abs(Val) >= 1.0E+19,
                    runtime error 1 ($1) occurs. if Val is of type Integer
                    and Abs(Val) > 181, only the lower two bytes of the
                    result are returned (no errors even with {$R+}).

  -------------------------------- Example ---------------------------------

           I := Sqr(15);            { I = 225 }
           X := Sqr(5.2);           { X = 27.04 }